* dired-aux.el (dired-diff): Work even when the mark is inactive.

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 16b28fc4e1e1736f04bf5ef945fdf9af24693600..e83bb0fd5e632d7917bf43633a1284c4d22bb498 100644 (file)
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -45,8 +45,8 @@
 FILE defaults to the file at the mark.
 The prompted-for file is the first file given to `diff'."
   (interactive
-   (let ((default (if (mark)
-                     (save-excursion (goto-char (mark))
+   (let ((default (if (mark t)
+                     (save-excursion (goto-char (mark t))
                                      (dired-get-filename t t)))))
      (list (read-file-name (format "Diff %s with: %s"
                                   (dired-get-filename t)